object frmQRReport: TfrmQRReport Left = 3 Top = 112 Width = 914 Height = 628 Caption = 'frmQRReport' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Scaled = False PixelsPerInch = 96 TextHeight = 13 object SSBarcode1: TSSBarcode Left = 816 Top = 136 Width = 257 Height = 13 BarCodeType = bcPostnet BarColor = clBlack BarWidth = 0.019999999552965160 Data = '94766-1234' DataField = 'Zip' DataSource = dsCustomers PrintHumanReadable = False WideBarRatio = 3.000000000000000000 Color = clWhite Font.Color = clWindowText Font.Height = -8 Font.Name = 'Courier New' Font.Style = [] end object QuickRep1: TQuickRep Left = 0 Top = -8 Width = 816 Height = 1056 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False DataSet = tbCustomers Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Options = [FirstPageHeader, LastPageFooter] Page.Columns = 2 Page.Orientation = poPortrait Page.PaperSize = Letter Page.Values = ( 100.000000000000000000 2794.000000000000000000 100.000000000000000000 2159.000000000000000000 100.000000000000000000 100.000000000000000000 0.000000000000000000) PrintIfEmpty = False PrinterSettings.Copies = 1 PrinterSettings.Duplex = False PrinterSettings.OutputBin = First SnapToGrid = True Units = Inches Zoom = 100 object DetailBand1: TQRBand Left = 38 Top = 78 Width = 370 Height = 107 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False AlignToBottom = False Color = clWhite ForceNewColumn = False ForceNewPage = False Size.Values = ( 283.104166666666700000 978.958333333333300000) BandType = rbDetail object QRDBText1: TQRDBText Left = 8 Top = 40 Width = 56 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666670000 21.166666666666670000 105.833333333333300000 148.166666666666700000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = tbCustomers DataField = 'Company' Transparent = False WordWrap = True FontSize = 10 end object QRDBText2: TQRDBText Left = 8 Top = 56 Width = 35 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666670000 21.166666666666670000 148.166666666666700000 92.604166666666670000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = tbCustomers DataField = 'Addr1' Transparent = False WordWrap = True FontSize = 10 end object QRDBText3: TQRDBText Left = 8 Top = 72 Width = 35 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666670000 21.166666666666670000 190.500000000000000000 92.604166666666670000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = tbCustomers DataField = 'Addr2' Transparent = False WordWrap = True FontSize = 10 end object QRDBText4: TQRDBText Left = 8 Top = 88 Width = 161 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666670000 21.166666666666670000 232.833333333333300000 425.979166666666700000) Alignment = taLeftJustify AlignToBand = False AutoSize = False AutoStretch = False Color = clWhite DataSet = tbCustomers DataField = 'City' Transparent = False WordWrap = True FontSize = 10 end object QRDBText5: TQRDBText Left = 176 Top = 88 Width = 73 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666670000 465.666666666666700000 232.833333333333300000 193.145833333333300000) Alignment = taLeftJustify AlignToBand = False AutoSize = False AutoStretch = False Color = clWhite DataSet = tbCustomers DataField = 'State' Transparent = False WordWrap = True FontSize = 10 end object QRDBText6: TQRDBText Left = 256 Top = 88 Width = 110 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666670000 677.333333333333300000 232.833333333333300000 291.041666666666700000) Alignment = taLeftJustify AlignToBand = False AutoSize = False AutoStretch = False Color = clWhite DataSet = tbCustomers DataField = 'Zip' Transparent = False WordWrap = True FontSize = 10 end object QR20ssBarcode1: TQR20ssBarcode Left = 8 Top = 16 Width = 257 Height = 13 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 34.395833333333330000 21.166666666666670000 42.333333333333330000 679.979166666666700000) Barcode = SSBarcode1 end end object TitleBand1: TQRBand Left = 38 Top = 38 Width = 740 Height = 40 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False AlignToBottom = False Color = clWhite ForceNewColumn = False ForceNewPage = False Size.Values = ( 105.833333333333300000 1957.916666666667000000) BandType = rbTitle object QRLabel1: TQRLabel Left = 136 Top = 8 Width = 520 Height = 25 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 66.145833333333330000 359.833333333333300000 21.166666666666670000 1375.833333333333000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = 'Test Report using ssBarcode and QuickReports 2.0' Color = clWhite Font.Color = clWindowText Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 16 end end end object tbCustomers: TTable Active = True DatabaseName = 'DBDEMOS' TableName = 'CUSTOMER.DB' Left = 824 Top = 48 object tbCustomersCompany: TStringField FieldName = 'Company' Size = 30 end object tbCustomersAddr1: TStringField FieldName = 'Addr1' Size = 30 end object tbCustomersAddr2: TStringField FieldName = 'Addr2' Size = 30 end object tbCustomersCity: TStringField FieldName = 'City' Size = 15 end object tbCustomersState: TStringField FieldName = 'State' end object tbCustomersZip: TStringField FieldName = 'Zip' OnGetText = tbCustomersZipGetText Size = 10 end end object dsCustomers: TDataSource DataSet = tbCustomers Left = 824 Top = 80 end end